53745 FRESGNUSRTANATNSGNRNDTAN^NEWPRINTPRINTCMDTAB(/INTATN(null)(null)(null)(null)(null)(null)%2**+)--4>FKXr~~~~~~~~~~~~~~~~~~~~~~~~}zkTA+
(null)(null)(null)(null)(null)MID$EXPSTR$POS/>*-/FNCLOSESYSCONTSAVEPRINTCLRPRINTPRINT#POKEPOKEDEFLISTPRINTSAVESAVEDEFRETURNGOTOLETLETREADDATAFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORINPUT#READRUNRETURNGOSUBRESTOREIFGOSUBRESTOREGOSUBRESTOREIFRUNIFRUNRETURNSTOPWAITSAVEDEFCLRNEWFN-OR<INTINTUSRINTABSPOSLOGPEEKRIGHT$(null)(null)(null)(null)(null)
3851  &*07=ELQYbksx|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|xttuwy{{wsqrtwz{{{{|}}||{wpic[RLFB<50,(%!
(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)PEEKPOS=/+NOTFNTAB(TAB(SPC(STEP--STEPTHENTOGETOPENCMDCONTPRINT#DEFSAVESTOPRETURNRESTORERUNREADINPUT#DATAFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORFORDATADIMRUNGOSUBONVERIFYCONTSYSGETTAB(FNFNTHENNOT+-*/ANDOR=INTFRERNDSINPEEKLENASCRIGHT$(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)	"$%(*)))+-03578876554335688;>ACDCBCDEFEEDEEDDFGIIIIHIJIHFECA><:987766542.*)(('&''(&$"! !""" 	
62198 [239][238][239][240][237][231][230][230][230][231][231][231][231][232][232][232][232][232][233][233][233][233][234][234][234][234][234][234][235][235][235][235][236][236][236][236][236][236][237][237][237][237][237][237][237][238][238][238][238][238][238][239][239][239][239][239][239][240][240][240][240][240][240][241][241][241][241][241][241][241][241][242][242][242][242][242][242][242][242][243][243][243][243][243][243][243][243][243][244][244][244][244][244][244][244][244][245][245][245][245][245][245][245][245][246][245][246][246][246][246][246][246][246][246][246][246][246][247][247][247][247][247][247][247][247][247][247][247][248][248][248][248][248][248][248][248][248][248][248][248][248][249][248][249][249][249][249][249][249][249][249][249][249][249][249][249][250][249][250][250][250][250][250][250][250][250][250][250][250][250][250][250][251][250][251][251][251][251][251][251][251][251][251][251][251][251][251][251][251][251][251][251][251][252][252][252][252][252][252][252][252][252][252][252][252][252][252][252][252][252][252][252][252][252]